home *** CD-ROM | disk | FTP | other *** search
- ;****************************************************************
- ;* HighSpeed MathLibs Installer Version 1.3r 30.Januar 1999 *
- ;* *
- ;* Copyright © 1998/99 by CyberdyneSystems *
- ;* written by Matthias Henze *
- ;* english translation written by Thomas Blätte *
- ;* italian translation written by Massimo Gais *
- ;* catalan translation written by Llorenç Grau *
- ;* *
- ;****************************************************************
- ;
- ; $VER: HD-Installer_script 1.3r (30.01.99)
-
- (set HSMathLibs-Version "44.40")
- (set HSMathLibs-Datum "31.März 1999")
- (set HSMathLibs-Datum_e "31 March 1999")
- (set HSMathLibs-Datum_i "31 March 1999")
- (set HSMathLibs-Datum_c "31 March 1999")
-
- ;====================================================================
- ; Initialisierungen
- ;====================================================================
-
- (set @default-dest "")
-
- (if (= @language "deutsch")
- (
- (set #welcome (cat
- "\nWillkommen bei der Installation der \n"
- "D E M O V E R S I O N\n"
- "der\n"
- "\"HighSpeed MathLibs\"\n\n"
- "Version "HSMathLibs-Version" vom "HSMathLibs-Datum"\n\n"
- "Dieses Skript installiert die \"HighSpeed MathLibs\",\n"
- "entsprechend Ihrer Angaben, auf Ihre Festplatte.\n\n\n"
- "Kopierrecht © 1998/99 bei CyberdyneSystems\n"
- "geschrieben von Matthias Henze"))
-
- (set #Anleitungen_Auswahl (cat
- "\nWählen Sie die Sprache für die AmigaGuide Dokumentation aus.\n"))
-
- (set #Anleitungen_Liste (cat
- "Installation der Anleitung.\n"
- "Bitte wählen Sie ein Laufwerk oder ein Verzeichnis.\n"
- "Es wird kein Verzeichnis erzeugt."))
- )
- )
- (if (= @language "italiano")
- (
- (set #welcome (cat
- "\nBenvenuti alla installazione della\n"
- "D E M O V E R S I O N\n"
- "di\n"
- "\"HighSpeed MathLibs\"\n\n"
- "versione "HSMathLibs-Version" del "HSMathLibs-Datum_i"\n\n"
- "Questo script installa le \"HighSpeed MathLibs\"\n"
- "secondo le tue indicazioni sul tuo harddisk.\n\n\n"
- "Copyright © 1998/99 by CyberdyneSystems\n"
- "scritto da Matthias Henze"))
-
- (set #Anleitungen_Auswahl (cat
- "\nScegli la lingua per la documentazione AmigaGuide.\n"))
-
- (set #Anleitungen_Liste (cat
- "Installazione del manuale.\n"
- "Scegli un volume o una directory.\n"
- "Una nuova directory non sarà creata."))
- )
- )
- (if (= @language "english")
- (
- (set #welcome (cat
- "\nWelcome to the installation of the\n"
- "D E M O V E R S I O N\n"
- "of\n"
- "\"HighSpeed MathLibs\"\n\n"
- "version "HSMathLibs-Version" from "HSMathLibs-Datum_e"\n\n"
- "This script installs the \"HighSpeed MathLibs\"\n"
- "according to your specification to your harddisk.\n\n\n"
- "Copyright © 1998/99 by CyberdyneSystems\n"
- "written by Matthias Henze"))
-
- (set #Anleitungen_Auswahl (cat
- "\nPlease choose the language for the AmigaGuide documentation.\n"))
-
- (set #Anleitungen_Liste (cat
- "Installation of the manual.\n"
- "Please choose a volume or a directory.\n"
- "A new directory will not be created."))
- )
- )
- (if (= @language "català")
- (
- (set #welcome (cat
- "\nBenvingut a la instal.lació de\n"
- "D E M O V E R S I O N\n"
- "de\n"
- "\"HighSpeed MathLibs\"\n\n"
- "versió "HSMathLibs-version" del "HSMathLibs-Datum_c"\n\n"
- "Aquest guió instal.la \"HighSpeed MathLibs\"\n"
- "segons les teves especificacions dins el teu HD.\n\n\n"
- "Copyright © 1998/99 by CyberdyneSystems\n"
- "escrit per Matthias Henze"))
-
- (set #Anleitungen_Auswahl (cat
- "\nSi us plau, tria el llenguatge per la documentació AmigaGuide.\n"))
-
- (set #Anleitungen_Liste (cat
- "Instal.lació del manual.\n"
- "Si us plau, tria un volum o directori.\n"
- "No es crearà cap nou directori."))
- )
- )
-
- ;=====================================================================================
- ; Beginn der Installation
- ;=====================================================================================
-
- (message #welcome)
- (welcome)
-
-
- (set Math_ver (getversion "libs:mathieeedoubbas.library"))
- (if (< Math_ver (* 44 65536))
- (
- (rename "libs:mathieeedoubbas.library" "libs:mathieeedoubbas.library.bak")
- )
- )
- (set Math_ver (getversion "libs:mathieeedoubtrans.library"))
- (if (< Math_ver (* 44 65536))
- (
- (rename "libs:mathieeedoubtrans.library" "libs:mathieeedoubtrans.library.bak")
- )
- )
- (set Math_ver (getversion "libs:mathieeesingtrans.library"))
- (if (< Math_ver (* 44 65536))
- (
- (rename "libs:mathieeesingtrans.library" "libs:mathieeesingtrans.library.bak")
- )
- )
- (set Math_ver (getversion "libs:mathtrans.library"))
- (if (< Math_ver (* 44 65536))
- (
- (rename "libs:mathtrans.library" "libs:mathtrans.library.bak")
- )
- )
-
- (copyfiles
- (source "libs")
- (dest "libs:")
- (all)
- )
-
- (
- (set kopiere_Anleitungen
- (askchoice
- (prompt #Anleitungen_Auswahl)
- (help @askchoice-help)
- (if (= @language "deutsch") ((default 0)))
- (if (= @language "english") ((default 1)))
- (if (= @language "italiano") ((default 2)))
- (if (= @language "català") ((default 3)))
- (choices
- "Deutsch"
- "English"
- "Italiano"
- "Catalan"
- )
- )
- )
- (if (= kopiere_Anleitungen 0) (set Quelle-D "HSMathLibs.guide"))
- (if (= kopiere_Anleitungen 1) (set Quelle-D "HSMathLibs_eng.guide"))
- (if (= kopiere_Anleitungen 2) (set Quelle-D "HSMathLibs_ita.guide"))
- (if (= kopiere_Anleitungen 3) (set Quelle-D "HSMathLibs_cat.guide"))
- (
- (set Dokverzeichnis
- (askdir
- (prompt #Anleitungen_Liste)
- (help @askdir-help)
- (default "")
- (disk)
- )
- )
- (makeassign "INSTDOK" Dokverzeichnis)
- (copyfiles
- (source Quelle-D)
- (dest "INSTDOK:")
- (infos)
- )
- )
- )
- (makeassign "INSTDOK")
-